home *** CD-ROM | disk | FTP | other *** search
- /* --------------------------------------------------------------- */
- /* WWW_home.rexx by Jeroen Schellekens */
- /* Links to the 303tracker homepage when a browser is running */
- /* --------------------------------------------------------------- */
-
- OPTIONS RESULTS
- PARSE ARG
-
- home="http://www.xs4all.nl/~jes303"
-
- IF SHOW('P','IBROWSE') THEN
- DO
- ADDRESS 303TRACKER_REXX
- 303_TO_BACK
- ADDRESS IBROWSE 'NewWindow "'home'"'
- END
-
- ELSE
-
- IF SHOW('P','VOYAGER') THEN
- DO
- ADDRESS 303TRACKER_REXX
- 303_TO_BACK
- ADDRESS VOYAGER 'OpenURL "'home'" NEWWIN'
- END
-
- ELSE
-
- IF SHOW('P','AWEB.1') THEN
- DO
- ADDRESS 303TRACKER_REXX
- 303_TO_BACK
- ADDRESS AWEB.1 'Open "'home'"'
- END
-
- ELSE
- DO
- ADDRESS COMMAND 'wait 1'
- ADDRESS 303TRACKER_REXX
- 303_TO_FRONT
- 303_REQ_NOTIFY '"Open URL (WWW Link) Failed!"' '"Cannot locate any browser-program!"' '"Sorry"'
- 303_REQ_NOTIFY '"How To Solve This Problem..."' '"Try to start your Internet-browser first."' '"Okay"'
- END
-